import List

sublistaRec:: [a] -> [[a]]
sublistaRec [] = [[]]
sublistaRec (x:xs) = [x:xs] ++ sublistaRec xs ++ sublistaRec (init(x:xs))

sublista:: (Eq a) => [a] -> [[a]]
sublista xs = nub (sublistaRec xs) -- nub xs devuelve la lista sin elementos repetidos por ej. nub [2,3,4,2,5,3] = [2,3,4,5]
